function [ im ] = adjF( pp1,pp2 )
%ADJF Summary of this function goes here
%   Detailed explanation goes here

n=verify2DPPInput(pp1,pp2);
n=n(1);
m=2*n+1;
adjpp1 = zeros(n,n);
adjpp2 = zeros(n,n);
for u=-n/2:n/2-1
    for v=-n/2:n/2-1
        for k=-n:n
            for l=-n/2:n/2
               adjpp1(u+n/2+1,v+n/2+1)=adjpp1(u+n/2+1,v+n/2+1)+...
                   pp1(k+n+1,l+n/2+1)*exp(((2*pi*1i*k)/m)*((-2*l/n)*v+u));
               adjpp2(u+n/2+1,v+n/2+1)=adjpp2(u+n/2+1,v+n/2+1)+...
                   pp2(k+n+1,l+n/2+1)*exp(((2*pi*1i*k)/m)*((-2*l/n)*u+v));
            end
        end
    end
end
im = adjpp1+adjpp2;
end
